perm filename SUMMER.FRE[D,LES] blob sn#104354 filedate 1974-05-29 generic text, type C, neo UTF8
COMMENT ⊗   VALID 00004 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	@@
C00004 00003	@.skip to column 1
C00006 00004	@	@
C00009 ENDMK
C⊗;
@@
.DEVICE XGP
.page frame 52 high 80 wide
.title area heading lines 1 to 3
.area text lines 4 to 52

.FONT 1 "BASL30"; FONT 2 "BASI30"; FONT 3 "BASB30"; FONT 5 "NGB25"
.FONT 6 "STA200.FNT[XGP,SYS]"
.TURN ON "%{α"
.!XGPLFTMAR←216;
.AT "ffi" ⊂ IF THISFONT ≤ 3 THEN "≠"  ELSE "fαfαi" ⊃;
.AT "ffl" ⊂ IF THISFONT ≤ 3 THEN "α∞" ELSE "fαfαl" ⊃;
.AT "ff"  ⊂ IF THISFONT ≤ 3 THEN "≥"  ELSE "fαf" ⊃;
.AT "fi"  ⊂ IF THISFONT ≤ 3 THEN "α≡" ELSE "fαi" ⊃;
.AT "fl"  ⊂ IF THISFONT ≤ 3 THEN "∨"  ELSE "fαl" ⊃;

.MACRO FAC ⊂FILL ADJUST COMPACT ⊃
.MACRO FAD ⊂FILL ADJUST COMPACT DOUBLE SPACE; PREFACE 2 ⊃

.MACRO LTR(name,dat)  ⊂
.place HEADING
.nofill
.BEGIN
.TURN ON "-←→∂↑↓&[]";
%6S%5 Artificial Intelligence Laboratory, STANFORD UNIVERSITY, Stanford, California 94305
.end
.PLACE TEXT;
.SELECT 5; if length ("dat") > 2 then date←"dat";
.once turn on "→"
%5Telephone 415-497-4971→{date}
.SKIP 3; SELECT 1
name
.⊃

.MACRO LDE ⊂ GROUP BEGIN SKIP 2; NOFILL
Sincerely,
.SKIP 3
Lester D. Earnest
Executive Officer
.END APART ⊃

.macro cb(head) ⊂ if lines<5 then next page else skip; once center; select 3
head

.⊃
@.skip to column 1
.ltr @2 @3 @1
Computer Science Department
Stanford University
Stanford, California
.fac
Dear @3:

I am pleased to offer you a @5 time summer position  in the
Stanford  Artificial  Intelligence  Laboratory at a monthly salary of
$@4, to work under the supervision of @6.


.lde
.skip 4; nofill
R. S. V. P.
.skip; turn on "→∂\"; tabs 8
→____________________
∂(70)date
.skip
\____  I accept, with pleasure.


\____  I decline your stingy offer.
.skip 2


∂(50)				_______________________
∂(50)				Signature
@	@
Barstow	Mr.	David	750	full	Prof. Green
Baumgart	Mr.	Bruce	780	full	Prof. McCarthy